VecValueTemp=[105 107 109 110 111 112 117 118 121 122 123 124 154 155];
for n1=1:size(VecValueTemp,2)
    FilterFourthLevelEditorsCoAuthors(VecValueTemp(1,n1));
    FilterFourthLevelEditorsCoAuthors2(VecValueTemp(1,n1));
end